100 :
110 REM MONEY FUNCTIONS ON DOLLARS
120 :
130 REM NOTE THEY MAY BE INNACCURATE ON         LARGE NUMBERS DUE TO ROUND-OFF
140 REM RD(X) ROUNDS UP OR DOWN TO A            FULL CENT
150 REM RS(X) RAISES TO NEXT FULL CENT          IF THERE'S A FRACTION OF A CENT
160 REM TR(X) TRUNCATES, OR LOPS OFF            ANY FRACTION OF A CENT
170 REM FR(X) RETURNS ONLY FRACTION             OF A CENT
180 :
190 DEF FN RD(X)=INT(X*100+.5)/100
200 :
210 DEF FN RS(X)=INT(X*100+.9999)/100
220 :
230 DEF FN TR(X)=INT(X*100)/100
240 :
250 DEF FN FR(X)=X-INT(X*100)/100
260 :
270 :
280 :
290 REM MONEY FUNCTIONS ON PENNIES
300 :
310 REM NO ROUNDOFF ERRORS, BUT THE             VALUES ARE PENNIES, NOT DOLLARS
320 REM RD(X) ROUNDS UP OR DOWN TO A            FULL CENT
330 REM RS(X) RAISES TO NEXT FULL CENT          IF THERE'S A FRACTION OF A CENT
340 REM TR(X) TRUNCATES, OR LOPS OFF            ANY FRACTION OF A CENT
350 REM FR(X) RETURNS ONLY FRACTION             OF A CENT
360 :
370 DEF FN RD(X)=INT(X+.5)
380 :
390 DEF FN RS(X)=INT(X+.99999)
400 :
410 DEF FN TR(X)=INT(X)
420 :
430 DEF FN FR(X)=X-INT(X)